% slant font for slope 1/6 % now obsolete, replaced by slaps6[mf,sys]
s=1/6;
mode=aps;
fontsetup;
n=30;
r#=.4;
u=round(r#*vppp); if u=0: u:=1 fi;

input slant
end